home *** CD-ROM | disk | FTP | other *** search
/ QuickTime for the Web (2nd Edition) / QuickTime for the Web (2nd Edition).iso / pc / Demos / Mac / Matthew's Behaviors / KeyboardEventƒ / LetterKeys < prev    next >
Encoding:
INI File  |  2001-09-10  |  1.8 KB  |  75 lines
  1. [Name]
  2. LetterKeys - Use with keyboardEvent to poll the Alphabet
  3. By Matthew Peterson, matthew@pinoko.berkeley.edu
  4.  
  5. [Description]
  6. 2-19-2000
  7. Place this behavior in the same sprite as the KeyboardEvent
  8. behavior to have lower and upper case letters check to see
  9. if they get pressed. This also polls the spacebar.
  10.  
  11. [Parameters]
  12.  
  13. [200072 MP_KBAlphabet]
  14. GlobalVars whichkeyN whichkeyC IsCap
  15. //Use with KeyboardEvent Behavior.
  16. //Letters in the order of usage frequency in modern English
  17. //Returns the Ascii number of the letter
  18. //Default is to give the number of the capital letter
  19. //Check IsCap to find if it really is a capital or not.
  20. IF(KeyIsDown(kNone,' '))
  21.     whichkeyN = 32
  22. ELSEIF(KeyIsDown(kNone,'e'))
  23.     whichkeyN = 69
  24. ELSEIF(KeyIsDown(kNone,'t'))
  25.     whichkeyN = 84
  26. ELSEIF(KeyIsDown(kNone,'n'))
  27.     whichkeyN = 78
  28. ELSEIF(KeyIsDown(kNone,'r'))
  29.     whichkeyN = 82
  30. ELSEIF(KeyIsDown(kNone,'o'))
  31.     whichkeyN = 79
  32. ELSEIF(KeyIsDown(kNone,'i'))
  33.     whichkeyN = 73
  34. ELSEIF(KeyIsDown(kNone,'a'))
  35.     whichkeyN = 65
  36. ELSEIF(KeyIsDown(kNone,'s'))
  37.     whichkeyN = 83
  38. ELSEIF(KeyIsDown(kNone,'d'))
  39.     whichkeyN = 68
  40. ELSEIF(KeyIsDown(kNone,'l'))
  41.     whichkeyN = 76
  42. ELSEIF(KeyIsDown(kNone,'h'))
  43.     whichkeyN = 72
  44. ELSEIF(KeyIsDown(kNone,'c'))
  45.     whichkeyN = 67
  46. ELSEIF(KeyIsDown(kNone,'f'))
  47.     whichkeyN = 70
  48. ELSEIF(KeyIsDown(kNone,'u'))
  49.     whichkeyN = 85
  50. ELSEIF(KeyIsDown(kNone,'p'))
  51.     whichkeyN = 80
  52. ELSEIF(KeyIsDown(kNone,'m'))
  53.     whichkeyN = 77
  54. ELSEIF(KeyIsDown(kNone,'y'))
  55.     whichkeyN = 89
  56. ELSEIF(KeyIsDown(kNone,'w'))
  57.     whichkeyN = 87
  58. ELSEIF(KeyIsDown(kNone,'g'))
  59.     whichkeyN = 71
  60. ELSEIF(KeyIsDown(kNone,'v'))
  61.     whichkeyN = 86
  62. ELSEIF(KeyIsDown(kNone,'b'))
  63.     whichkeyN = 66
  64. ELSEIF(KeyIsDown(kNone,'x'))
  65.     whichkeyN = 88
  66. ELSEIF(KeyIsDown(kNone,'q'))
  67.     whichkeyN = 81
  68. ELSEIF(KeyIsDown(kNone,'k'))
  69.     whichkeyN = 75
  70. ELSEIF(KeyIsDown(kNone,'j'))
  71.     whichkeyN= 74
  72. ELSEIF(KeyIsDown(kNone,'z'))
  73.     whichkeyN = 90
  74. ENDIF
  75.